## Function to customize ggplot theme with legend

set_my_ggtheme_legend <- function(base_size = 12, base_family = "") { 
  
  theme_few(base_size = base_size, 
            base_family = base_family) %+replace%
    theme(axis.text.x =  element_text(size = base_family, colour = "black", hjust = .5 , vjust = 1),
          axis.text.y =  element_text(size = base_family, colour = "black", hjust = 0  , vjust = 0.5),
          axis.ticks =   element_blank(),
          panel.grid.major.x =   element_line(colour = "grey50"),
          axis.title.y = element_text(size = base_family, angle = 90, vjust = .01, hjust = .1),
          strip.text.x = element_text(size = base_family, margin = margin(b = 5)),
          panel.border = element_blank())
  
}
